  10 CLEAR 32767:LOAD "" CODE:CLS
  20 RANDOMIZE USR 32768
